Fortran 可分配形参

如果子例程有显式接口，那么形参可以是可分配的。

• 如果是 intent(in)，那么不能分配或释放；
• 如果是 intent(inout)，那么可以调整，并返回最终的分配状态和数据；
• 如果是 intent(out)，那么实参在入口处被释放，子例程使用后返回；

real, dimension(:), allocatable, intent(inout) :: array